Przekrój ostrosłupa prawidłowego
trójkątnego płaszczyzną zawierającą
wysokość podstawy.

Ustal wymiary ostrosłupa oraz 
miarę kąta jaki tworzy płaszczyzna 
przekroju z podstawą.

Opracował: Piotr Leszczyński

Pole przekroju =

Obwód przekroju =

α

Pokaż płaszczyznę przekroju

a = 5 (slider from 0.1 to 10, step 0.1)
h = 4 (slider from 0.1 to 10, step 0.1)
α = 1.0471975511965976 rad (slider from 0° to 90°, step 0.1°)
B: (((-a)) / 2, ((-a) * sqrt(3) / 6), 0)
C = Mirror(B, yAxis)
wielokąt1, f, g, i, A = Polygon(B, C, 3, xOyPlane)
S: (0, 0, h)
b, powierzchniaBCS, powierzchniaACS, powierzchniaABS, krawędźBS, krawędźCS, krawędźAS = Pyramid(wielokąt1, S)
j = OrthogonalLine(S, wielokąt1)
O = Intersect(j, wielokąt1)
k = Segment(S, O)
l = Line(O, C)
m = Line(A, O)
n = Line(B, O)
D = Intersect(f, m)
E = Intersect(l, i)
F = Intersect(g, n)
p = Segment(E, C)
q = Segment(D, A)
r = Segment(F, B)
p1 = true
p2 = true
s = OrthogonalLine(B, wielokąt1)
G: (x(B), y(B), (a / 2 * tan(α)))
c = Plane(C, E, G)
H = Intersect(krawędźBS, c)
t1, c_1, e, h_1 = Polygon(E, H, C)
t2, s_1, c_2, e_1 = Polygon(C, E, S)
d = Plane(C, E, S)
t = OrthogonalLine(H, s_1, space)
I = Intersect(s_1, t)
f_1 = Segment(I, H)
g_1 = OrthogonalLine(H, wielokąt1)
J = Intersect(g_1, wielokąt1)
i_1 = Segment(J, H)
j_1 = Segment(J, I)
β = Angle(J, I, H)
k_1 = OrthogonalLine(O, d)
K = Intersect(f, k_1)
γ = Angle(K, O, S)
l_1 = Segment(O, K)
o = Plane(C, E, H)
tekst4: "" + t1 + ""
tekst5: "" + t2 + ""
tekst6: "" + (c_1 + e + h_1) + ""
tekst7: "" + (c_2 + e_1 + s_1) + ""
p3 = true